home *** CD-ROM | disk | FTP | other *** search
/ The Original Shareware 1.1 / The Original Shareware (WeMake CDs)(Volume 1.1)(CDs, Inc)(1993).iso / 16 / fpc225_3.zip / F-PCHELP.ZIP / SAVEEXE.HLP < prev    next >
Text File  |  1988-01-11  |  1KB  |  43 lines
  1. \ SAVEEXE.HLP   A SAVE EXE routine. Extracted from F83Y by Tom Zimmer
  2.  
  3.  
  4. XCKSUM          ( add cnt startv seg - cksum )
  5.         Calculate the checksum of the data in "add", for length "cnt".
  6.         Use the starting value "startv", with the data located in segment
  7.         "seg". Return "cksum" as the result.
  8.  
  9. SUVEC           ( --- a1 )
  10.         A 32 bit variable that holds the starting segment and offset
  11.         for the forth system in memory. Used by SAVE-EXE to decide
  12.         where to jump to when starting Forth.
  13.  
  14. DPSTART         ( --- a1 )
  15.         The starting Dictionary Pointer for Forth when starting up.
  16.  
  17. EHMT            ( --- a1 )
  18.         Returns the address a1 the address of a dummy empty .EXE
  19.         header.
  20.  
  21. EHADR   header address
  22. EHZ     header size
  23. EHLMRV  load module remainder
  24. EH512Z  # 512 blocks in entire file
  25. EHCKSM  entire file checksum so file words total to FFFFh
  26. EHSP    startup SP
  27.  
  28. WEXE            ( handle --- )
  29.         Write the Forth image in memory to the open file specified
  30.         by handle.
  31.  
  32. exehcb          ( --- a1 )
  33.         A handle for use while saving an .EXE file.
  34.  
  35. FSAVE           ( | name --- )
  36.         a pseudonym for SAVE-EXE
  37.  
  38. save-exe        ( | name --- )
  39.         Save the current Forth memory image to the file "name" if
  40.         present, or if not present, then prompt for a name to save to.
  41.  
  42.  
  43.